1000 POKE53280,0:POKE53281,0
1010 PRINTCHR$(8)CHR$(14)"[147][159]          [208]LOT-[194]ASIC 64  [196]EMO           "
1020 PRINT"    [196]IESES [196]EMO SOLL [201]HNEN DIE [214]ER-"
1030 PRINT"    WENDUNG VON [208]LOT-[194]ASIC-[194]EFEHLEN"
1040 PRINT"    VERANSCHAULICHEN."
1050 PRINT"    [194]ITTE GEHEN [211]IE DAS [208]ROGRAMM"
1060 PRINT"    [218]EILE FUER [218]EILE DURCH, UND LERNEN"
1070 PRINT"    [211]IE DIE [212]RICKS VON [208]LOT-[194]ASIC 64"
1080 PRINT"    KENNEN. [197]S WIRD SICH LOHNEN!"
1090 PRINT"    [215]AEHREND DAS [208]ROGRAMM LAEUFT WIRD "
1100 PRINT"    IMMER DIE GERADE BEARBEITETE [218]EILE"
1110 PRINT"    IN DEN ERSTEN BEIDEN [194]ILDSCHIRM"
1120 PRINT"    ZEILEN ANGEZEIGT.
1130 [153]"    (null)LOTTER (null)TARTKLAR MACHEN UND"
1140 [153]"    (null)VAL(null)(null)(null)(null)WAIT DRUECKEN !"
1150 [239]
1160 : [161] A$
1170 [240] A$[178][199](13)
1180 [153]"LOAD"
1190 [246]
1200 [208]
1210 [129] I [178] 0 [164] 240:[130]:[143] WARTEN BIS RESET FERTIG
1220 [207]
1230 [207]
1240 [212] 3
1250 [129] I [178] 0 [164] 3
1260 : [204] I
1270 : [211] I,[171]I,2,0,"(null)LOT-PEEKASIC 64  STR$EMO"
1280 [130]
1290 [207]
1300 [215] 40,[171]400
1310 [230] 0,0
1320 [204] 0
1330 [232] 0,400,0,400,500,0
1340 [129] AR [178] 0 [164] 6
1350 [204] AR
1360 : [216] 10[170]AR[172]55,0,50,20[170]AR[172]50,AR,10
1370 [130]
1380 [129] I [178] 0 [164] 6
1390 : [204] I
1400 : [218] 10[170]I[172]55,[171]20,4,0,[202]([196](1978[170]I),2)
1410 [130]
1420 :
1430 [143] PROGRAMMABSCHNITT KUCHENGRAPHIK
1440 :
1450 [135] AN : [143] ANZAHL DER WERTE
1460 [129] I [178] 1 [164] AN
1470 : [135] WE(I)
1480 : SU [178] SU [170] [182](WE(I))
1490 [130]
1500 [231] 0,[171]220
1510 [207]
1520 [215] 479[173]2,0
1530 [129] I [178] 1 [164] AN
1540 : [139] WE(I)[179]0[167]HE[178]39:WE(I)[178][182](WE(I))
1550 : PR [178] 100 [173] SU [172] WE(I)
1560 : WI [178] [181] (PR [172] 3.6 [170] .5)
1570 : EW [178] EW [170] WI
1580 : HI [178] SW [170] (WI [173] 2)
1590 : [139] PR [179] 1 [167] 1680
1600 : [204] I
1610 : [219] 0,0,HE,HE,HI,HI,1
1620 : [225] 0,0,200,SW,EW,1
1630 : GR [178] 4
1640 : [139] PR [179] 3 [167] GR [178] 8
1650 : [219] 0,0,100 [170] HE,100 [170] HE,HI,HI,1
1660 : PR [178] [181] (PR [170] 0.5)
1670 : [223] [171]10,[171]10,GR,0,[202] ([196] (PR),2) [170] "%"
1680 : SW [178] EW
1690 : HE [178] 0
1700 [130]
1710 :
1720 [143] DATA WERTE FUER KUCHENGRAFPHIK
1730 [143] WENN WERT NEGATIV, DANN WIRD
1740 [143] DIESER HERVORGEHOBEN
1750 :
1760 [131] 4 :[143] ANZAHL DER WERTE
1770 [131] 200,-100,80,170
1780 :
1790 :
1800 [143] MINIFUNKTIONSPLOT
1810 [150] [165]A(X)[178]X[174]3[173]50 000
1820 [231] 0,[171]300
1830 [207]
1840 [215] 479[173]2,0
1850 [230] 0,0
1860 [204] 0
1870 [232] [171]200,200,[171]150,150,50,5
1880 [230] [171]200,[165]A([171]200)
1890 [204] 3
1900 [129] X [178] [171]200 [164] 200 [169] 3
1910 : Y [178] [165]A(X)
1920 : [227] X,Y
1930 [130]
1940 [212] 2
1950 [218] [171]170,100,4,0,"F(X)=X^3"
1960 [212] 3
1970 [230] 0,[171]200
1980 AR(0)[178]4:AB(0)[178]5
1990 AR(1)[178]1:AB(1)[178]1
2000 AR(2)[178]5:AB(2)[178]5
2010 [243] 1000
2020 [207]
2030 [206] 2
2040 [204] 0
2050 [207] "  (null)ERKAUFSZAHLEN:"
2060 [231] 0,[171]300
2070 [207]
2080 [215] 79,0
2090 [230] 0,0
2100 [204] 0
2110 [232] 0,400,0,0,500,0
2120 [232] 0,0,0,320,60,5
2130 [129] JA [178] 0 [164] 4
2140 : [129] I[178]0[164]2
2150 :   [135] WE
2160 :   [204] I[170]1
2170 :   [216] JA[172]75[170]18[170]15[172]I,0,15,WE[172].06,AR(I),AB(I)
2180 : [130]
2190 [130]
2200 [204] 0
2210 [129] I [178] 1 [164] 5
2220 : [218] [171]79,I[172]60[171]10,4,0,[196](I[172]1000)
2230 [130]
2240 [218] [171]79,350,4,0," (null)TCK."
2250 [129] JA [178] 0 [164] 4
2260 : [218] JA[172]75[170]18,[171]20,4,0,[202]([196](1980[170]JA),2)
2270 [130]
2280 [129] I [178] 0 [164] 2
2290 : [207]
2300 : [204] I[170]1
2310 : [210] 100,0,30,[171]10,AR(I),AB(I)
2320 : [211] 150,[171]10,4,0,"(null)RODUKT "[170][199]([198]("ATN")[170]I)
2330 [130]
2340 [131] 1000,2000,3000
2350 [131] 1500,2100,2700
2360 [131] 1600,2900,1700
2370 [131] 2600,3500,1000
2380 [131] 3000,4900,1600
2390 [231] 0,[171]200
2400 [247]
2410 [153]"LOAD VALNDE "